100 DEV=4 : REM PRINTER DEVICE NUMBER
110 LOC=49152:LINE=1000
120 PRINT"POKING DATA FROM LINE"LINE:K=0:CHECK=0
130 IF LOC>50148 THEN170
140 READN:POKELOC,N:LOC=LOC+1:CHECK=CHECK+N:K=K+1:IFK<16THEN130
150 READ N:IFN=CHECKTHENLINE=LINE+10:GOTO120
160 PRINT"DATA STATEMENT ERROR ON LINE"LINE:END
170 READ N:IFN<>CHECKTHEN160
180 POKE 49250,DEV
190 PRINT"LISTER LOAD SUCCESSFUL.":PRINT"SYS 49152 TO START":END
1000 DATA 162,0,189,140,195,240,6,32,210,255,232,208,245,32,228,255,2629
1010 DATA 240,251,201,83,208,11,141,232,195,169,147,32,201,194,76,120,2501
1020 DATA 192,201,80,208,232,141,232,195,32,210,255,32,199,194,162,0,2565
1030 DATA 189,177,195,240,6,32,210,255,232,208,245,162,61,169,0,157,2538
1040 DATA 254,195,202,169,32,157,254,195,202,208,250,32,207,255,201,13,2826
1050 DATA 240,8,157,254,195,232,224,60,208,241,169,1,141,244,195,169,2738
1060 DATA 3,162,4,160,255,32,186,255,169,0,32,189,255,32,192,255,2181
1070 DATA 162,3,32,201,255,32,91,194,165,43,133,251,165,44,133,252,2156
1080 DATA 198,251,169,0,141,233,195,169,6,141,236,195,173,233,195,208,2743
1090 DATA 39,160,0,169,0,141,230,195,141,245,195,141,234,195,141,246,2472
1100 DATA 195,141,229,195,162,3,177,251,208,3,238,230,195,200,202,208,2837
1110 DATA 245,173,230,195,201,3,208,7,32,199,194,32,231,255,96,177,2478
1120 DATA 251,141,242,195,200,177,251,140,253,195,141,243,195,162,0,32,2818
1130 DATA 67,194,32,195,194,169,2,141,246,195,172,253,195,200,177,251,2683
1140 DATA 208,23,140,253,195,32,74,195,173,253,195,24,101,251,133,251,2501
1150 DATA 169,0,101,252,133,252,76,140,192,170,173,245,195,208,43,138,2487
1160 DATA 201,177,144,25,201,180,176,21,41,127,141,251,195,173,239,195,2487
1170 DATA 208,3,32,195,194,169,1,141,239,195,76,139,193,173,239,195,2392
1180 DATA 240,3,32,195,194,169,0,141,239,195,138,201,58,208,23,173,2209
1190 DATA 245,195,240,4,169,58,208,43,32,195,194,169,58,32,201,194,2237
1200 DATA 32,74,195,76,221,192,138,201,34,208,13,173,245,195,73,255,2325
1210 DATA 141,245,195,169,34,76,232,193,201,32,208,13,173,245,195,240,2592
1220 DATA 0,169,32,32,201,194,76,221,192,201,128,176,3,76,232,193,2126
1230 DATA 173,245,195,208,115,138,41,127,141,251,195,201,2,208,9,173,2422
1240 DATA 236,195,56,233,2,141,236,195,32,195,194,162,0,140,253,195,2465
1250 DATA 160,0,236,251,195,240,14,185,158,160,201,129,144,4,232,200,2509
1260 DATA 208,240,200,208,242,185,158,160,201,129,144,54,41,127,32,201,2530
1270 DATA 194,173,239,195,208,22,173,251,195,201,35,240,15,201,38,240,2620
1280 DATA 11,201,52,144,4,201,75,144,3,32,195,194,173,251,195,201,2076
1290 DATA 1,208,9,173,236,195,24,105,2,141,236,195,172,253,195,76,2221
1300 DATA 221,192,32,201,194,200,208,189,32,201,194,76,221,192,169,48,2570
1310 DATA 141,231,195,173,242,195,56,237,240,195,141,242,195,173,243,195,3094
1320 DATA 237,241,195,141,243,195,144,5,238,231,195,208,230,24,173,240,2940
1330 DATA 195,109,242,195,141,242,195,173,241,195,109,243,195,141,243,195,3054
1340 DATA 173,231,195,201,48,208,9,173,234,195,208,7,169,32,208,6,2297
1350 DATA 141,234,195,173,231,195,32,201,194,169,0,141,237,195,174,252,2764
1360 DATA 195,232,232,189,217,195,201,42,208,1,96,142,252,195,141,240,2778
1370 DATA 195,232,189,217,195,141,241,195,76,238,193,173,254,195,201,64,2999
1380 DATA 240,96,32,199,194,162,0,189,133,195,240,6,32,210,255,232,2415
1390 DATA 208,245,162,0,189,254,195,240,6,32,210,255,232,208,245,162,2843
1400 DATA 0,189,211,195,240,6,32,210,255,232,208,245,169,0,174,244,2610
1410 DATA 195,140,253,195,32,205,189,172,253,195,32,199,194,162,0,189,2605
1420 DATA 133,195,240,6,32,210,255,232,208,245,162,67,169,45,32,210,2441
1430 DATA 255,202,208,248,32,199,194,32,199,194,169,5,141,238,195,238,2749
1440 DATA 244,195,96,169,32,208,2,169,13,140,247,195,142,248,195,141,2436
1450 DATA 235,195,201,32,208,17,205,237,195,240,67,173,237,195,201,40,2678
1460 DATA 240,60,173,246,195,208,55,173,246,195,240,38,174,236,195,201,2875
1470 DATA 2,240,4,138,76,251,194,138,56,233,6,141,230,195,141,229,2274
1480 DATA 195,240,12,169,32,32,210,255,206,230,195,208,246,169,0,141,2540
1490 DATA 246,195,173,235,195,141,237,195,32,210,255,238,229,195,32,228,3036
1500 DATA 255,208,2,240,30,169,128,141,249,195,141,250,195,206,249,195,2853
1510 DATA 208,251,206,250,195,208,246,32,228,255,240,251,201,81,208,3,3063
1520 DATA 141,233,195,172,247,195,174,248,195,96,32,199,194,173,232,195,2921
1530 DATA 201,80,208,43,173,229,195,201,80,144,8,238,238,195,169,0,2402
1540 DATA 141,229,195,238,238,195,173,238,195,201,62,144,18,173,254,195,2889
1550 DATA 201,64,240,11,162,5,32,199,194,202,208,250,32,91,194,169,2254
1560 DATA 1,141,246,195,96,32,32,32,32,32,32,0,147,79,85,84,1266
1570 DATA 80,85,84,32,84,79,32,80,82,73,78,84,69,82,32,79,1135
1580 DATA 82,32,83,67,82,69,69,78,32,40,80,47,83,41,63,32,980
1590 DATA 0,84,89,80,69,32,73,78,32,65,32,72,69,65,68,73,981
1600 DATA 78,71,32,70,79,82,32,69,65,67,72,32,80,65,71,69,1034
1610 DATA 58,13,0,80,65,71,69,32,0,16,39,232,3,100,0,10,788
1620 DATA 0,1,0,42,42,85